object Form1: TForm1
  Left = 94
  Top = 87
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Table Utilities'
  ClientHeight = 321
  ClientWidth = 513
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnActivate = FormActivate
  TextHeight = 16
  object Label7: TLabel
    Left = 40
    Top = 8
    Width = 101
    Height = 16
    Caption = 'Work on this field'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 208
    Top = 8
    Width = 126
    Height = 16
    Caption = 'Group on these fields'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Notebook: TTabbedNotebook
    Left = 8
    Top = 88
    Width = 497
    Height = 225
    TabsPerRow = 4
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 2
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Summary'
      object Label2: TLabel
        Left = 160
        Top = 32
        Width = 161
        Height = 16
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Button2: TButton
        Left = 8
        Top = 72
        Width = 137
        Height = 33
        Caption = 'ColumnTotal'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 8
        Top = 29
        Width = 137
        Height = 33
        Caption = 'Group Summary'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button3Click
      end
      object Button4: TButton
        Left = 8
        Top = 112
        Width = 137
        Height = 33
        Caption = 'DS SQL ColumnTotal'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button4Click
      end
      object Button5: TButton
        Left = 8
        Top = 152
        Width = 139
        Height = 33
        Caption = 'DSTable ColumnTotal'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = Button5Click
      end
      object DBGrid1: TDBGrid
        Left = 159
        Top = 65
        Width = 320
        Height = 120
        DataSource = DataSource1
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 4
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = 'System'
        TitleFont.Style = []
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Statistical'
      object Label3: TLabel
        Left = 112
        Top = 58
        Width = 353
        Height = 71
        Font.Color = clBlack
        Font.Height = -21
        Font.Name = 'Times New Roman'
        Font.Style = [fsItalic]
        ParentFont = False
        WordWrap = True
      end
      object Button10: TButton
        Left = 16
        Top = 25
        Width = 73
        Height = 25
        Caption = 'Min'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button10Click
      end
      object Button11: TButton
        Left = 16
        Top = 81
        Width = 73
        Height = 25
        Caption = 'Max'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button11Click
      end
      object Button12: TButton
        Left = 16
        Top = 137
        Width = 73
        Height = 25
        Caption = 'Avg'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button12Click
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Import/Export'
      object Label4: TLabel
        Left = 24
        Top = 8
        Width = 67
        Height = 16
        Caption = 'Export type'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 192
        Top = 8
        Width = 58
        Height = 16
        Caption = 'Export To'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Button6: TButton
        Left = 192
        Top = 128
        Width = 137
        Height = 33
        Caption = 'DataSet Export'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = Button6Click
      end
      object Button7: TButton
        Left = 192
        Top = 80
        Width = 137
        Height = 33
        Caption = 'ExportToTxt'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = Button7Click
      end
      object Button9: TButton
        Left = 24
        Top = 128
        Width = 137
        Height = 33
        Caption = 'Append From CSV'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = Button9Click
      end
      object ExportTypeDD: TComboBox
        Left = 24
        Top = 29
        Width = 153
        Height = 24
        Style = csDropDownList
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemHeight = 16
        Items.Strings = (
          'Comma Separated'
          'Fixed'
          'Quoted')
        ParentFont = False
        Sorted = True
        TabOrder = 0
      end
      object ExportPath: TEdit
        Left = 192
        Top = 29
        Width = 129
        Height = 24
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        Text = 'C:\EXP2TXT.TXT'
      end
      object Button13: TButton
        Left = 352
        Top = 24
        Width = 89
        Height = 33
        Caption = 'View It'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button13Click
      end
      object Button8: TButton
        Left = 24
        Top = 80
        Width = 137
        Height = 33
        Caption = 'Create From CSV'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        OnClick = Button8Click
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Other'
      object Label1: TLabel
        Left = 70
        Top = 96
        Width = 5
        Height = 23
        Font.Color = clBlack
        Font.Height = -21
        Font.Name = 'Times New Roman'
        Font.Style = [fsItalic]
        ParentFont = False
      end
      object Button1: TButton
        Left = 16
        Top = 32
        Width = 105
        Height = 33
        Caption = 'GetFieldName'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button1Click
      end
      object FieldNameNum: TSpinEdit
        Left = 128
        Top = 35
        Width = 41
        Height = 26
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        MaxValue = 16
        MinValue = 0
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 1
        Value = 0
      end
    end
  end
  object FieldsDD: TComboBox
    Left = 40
    Top = 29
    Width = 129
    Height = 24
    Style = csDropDownList
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 16
    Items.Strings = (
      'BETA'
      'CUR_PRICE'
      'INDUSTRY'
      'OUTLOOK'
      'P_E_RATIO'
      'PRICE_CHG'
      'PROJ_GRTH'
      'RCMNDATION'
      'RISK'
      'SAFETY'
      'YRL_HIGH'
      'YRL_LOW')
    ParentFont = False
    Sorted = True
    TabOrder = 0
  end
  object GroupSumLB: TListBox
    Left = 208
    Top = 29
    Width = 121
    Height = 49
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 16
    Items.Strings = (
      'BETA'
      'CUR_PRICE'
      'INDUSTRY'
      'OUTLOOK'
      'P_E_RATIO'
      'PRICE_CHG'
      'PROJ_GRTH'
      'SAFETY'
      'YRL_HIGH'
      'YRL_LOW')
    MultiSelect = True
    ParentFont = False
    Sorted = True
    TabOrder = 1
  end
  object Button14: TButton
    Left = 408
    Top = 29
    Width = 89
    Height = 33
    Caption = 'Exit'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = Button14Click
  end
  object Queryy: TQuery
    DatabaseName = 'DBDEMOS'
    SQL.Strings = (
      'SELECT * FROM MASTER')
    Left = 416
    object QueryySYMBOL: TStringField
      FieldName = 'SYMBOL'
      Size = 7
    end
    object QueryyCO_NAME: TStringField
      FieldName = 'CO_NAME'
    end
    object QueryyEXCHANGE: TStringField
      FieldName = 'EXCHANGE'
      Size = 8
    end
    object QueryyCUR_PRICE: TFloatField
      FieldName = 'CUR_PRICE'
    end
    object QueryyYRL_HIGH: TFloatField
      FieldName = 'YRL_HIGH'
    end
    object QueryyYRL_LOW: TFloatField
      FieldName = 'YRL_LOW'
    end
    object QueryyP_E_RATIO: TFloatField
      FieldName = 'P_E_RATIO'
    end
    object QueryyBETA: TFloatField
      FieldName = 'BETA'
    end
    object QueryyPROJ_GRTH: TFloatField
      FieldName = 'PROJ_GRTH'
    end
    object QueryyINDUSTRY: TSmallintField
      FieldName = 'INDUSTRY'
    end
    object QueryyPRICE_CHG: TSmallintField
      FieldName = 'PRICE_CHG'
    end
    object QueryySAFETY: TSmallintField
      FieldName = 'SAFETY'
    end
    object QueryyRATING: TStringField
      FieldName = 'RATING'
      Size = 4
    end
    object QueryyRANK: TFloatField
      FieldName = 'RANK'
    end
    object QueryyOUTLOOK: TSmallintField
      FieldName = 'OUTLOOK'
    end
    object QueryyRCMNDATION: TStringField
      FieldName = 'RCMNDATION'
      Size = 5
    end
    object QueryyRISK: TStringField
      FieldName = 'RISK'
      Size = 4
    end
  end
  object DataSource1: TDataSource
    DataSet = Queryy
    Left = 448
  end
  object Tabley: TTable
    DatabaseName = 'DBDEMOS'
    Exclusive = True
    TableName = 'MASTER.DBF'
    Left = 480
  end
end